From a1bda481b9df6e10879d85ed3020069f626fc58f Mon Sep 17 00:00:00 2001 From: "Richard M. Stallman" Date: Sat, 1 May 1993 03:09:16 +0000 Subject: [PATCH] (vc-revert-buffer1): Fix format of compilation-error-list. --- lisp/vc.el | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/lisp/vc.el b/lisp/vc.el index 434f2543148..2e0fa62eac0 100644 --- a/lisp/vc.el +++ b/lisp/vc.el @@ -282,10 +282,10 @@ the master name of FILE; this is appended to an optional list of FLAGS." (buffer-error-marked-p nil)) (while (and errors (not buffer-error-marked-p)) - (and (markerp (car (cdr (car errors)))) + (and (markerp (cdr (car errors))) (eq buffer (marker-buffer - (car (cdr (car errors))))) + (cdr (car errors)))) (setq buffer-error-marked-p t)) (setq errors (cdr errors))) (if buffer-error-marked-p buffer))) -- 2.30.2